home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 4 / FM Towns Free Software Collection 4 - Disc 1.iso / t_os / ashula / ashsmp / test.a < prev    next >
Text File  |  1991-10-18  |  5KB  |  227 lines

  1. set PMGf 0 ".\sample.pgf"
  2. set PMGf 1 ".\sample2.pgf"
  3. begin
  4. screen 0 3
  5. screen 1 3
  6. string view 0 16 384 623 431 0 16 16 16 smooth
  7. color 0 1 1
  8. string color 0 15
  9. color 0 0 12
  10. box 0 14 382 625 433
  11. string clear 0
  12. string 0 "                      ASHULA特殊効果説明デモ"
  13. wait 300
  14. cont string 0 "\n         これからASHULAの特殊効果の説明を行います。\n         途中で終わる時はマウスの右ボタンををしばらく押していてください。"
  15. wait 180
  16. mouse on
  17. point set 1 0 0
  18. layer set 1
  19. color 1 1 1
  20. string clear 0
  21. effect disable
  22. cont string 0 "\neffect disable\n \n効果を使用しないでファイルを読みながら表示します。"
  23. background 0
  24. wait 120
  25. point set 1 160 120
  26. background 1
  27. wait 180
  28. button get end 1
  29. wipe 1 disable
  30.  
  31. effect very slow wipe down
  32. cont string 0 "\neffect very slow wipe down\n\n上から下に画面を描き変えます。"
  33. point set 1 0 0
  34. background 0
  35. wait 120
  36. point set 1 160 120
  37. background 1
  38. wait 180
  39. button get end 1
  40. wipe 1 very fast wipe up
  41.  
  42. effect very slow wipe up
  43. cont string 0 "\neffect very slow wipe up\n \n下から上に画面を描き変えます。"
  44. point set 1 0 0
  45. background 0
  46. wait 120
  47. point set 1 160 120
  48. background 1
  49. wait 180
  50. button get end 1
  51. wipe 1 very fast wipe down
  52.  
  53. effect very slow wipe right
  54. cont string 0 "\neffect very slow wipe right\n \n左から右に画面を描き変えます。"
  55. point set 1 0 0
  56. background 0
  57. wait 120
  58. point set 1 160 120
  59. background 1
  60. wait 180
  61. button get end 1
  62. wipe 1 very fast wipe left
  63.  
  64. effect very slow wipe left
  65. cont string 0 "\neffect very slow wipe left\n \n右から左に画面を描き変えます。"
  66. point set 1 0 0
  67. background 0
  68. wait 120
  69. point set 1 160 120
  70. background 1
  71. wait 180
  72. button get end 1
  73. wipe 1 very fast wipe right
  74.  
  75. effect very fast scroll down
  76. cont string 0 "\neffect very fast scroll down\n \n下に向かって画像がスクロールしてきます。"
  77. point set 1 0 0
  78. background 0
  79. wait 120
  80. point set 1 160 120
  81. background 1
  82. wait 180
  83. button get end 1
  84. wipe 1 very slow wipe up
  85.  
  86. effect very fast scroll up
  87. cont string 0 "\neffect very fast scroll up\n \n上に向かって画像がスクロールしてきます。"
  88. point set 1 0 0
  89. background 0
  90. wait 120
  91. point set 1 160 120
  92. background 1
  93. wait 180
  94. button get end 1
  95. wipe 1 very slow wipe down
  96.  
  97. effect very fast scroll right
  98. cont string 0 "\neffect very fast scroll right\n \n右に向かって画像がスクロールしてきます。"
  99. point set 1 0 0
  100. background 0
  101. wait 120
  102. point set 1 160 120
  103. background 1
  104. wait 180
  105. button get end 1
  106. wipe 1 very slow wipe left
  107.  
  108. effect very fast scroll left
  109. cont string 0 "\neffect very fast scroll left\n \n左に向かって画像がスクロールしてきます。"
  110. point set 1 0 0
  111. background 0
  112. wait 120
  113. point set 1 160 120
  114. background 1
  115. wait 180
  116. button get end 1
  117. wipe 1 very slow wipe right
  118.  
  119. effect very slow horizontal close
  120. cont string 0 "\neffect very slow horizontal close\n \n上下端から中心に向かって描き変えます。"
  121. point set 1 0 0
  122. background 0
  123. wait 120
  124. point set 1 160 120
  125. background 1
  126. wait 180
  127. button get end 1
  128. wipe 1 very fast horizontal open
  129.  
  130. effect very slow horizontal open
  131. cont string 0 "\neffect very slow horizontal open\n \n中心から上下端に向かって描き変えます。"
  132. point set 1 0 0
  133. background 0
  134. wait 120
  135. point set 1 160 120
  136. background 1
  137. wait 180
  138. button get end 1
  139. wipe 1 very fast horizontal close
  140.  
  141. effect very slow vertical close
  142. cont string 0 "\neffect very slow vertical close\n \n左右端から中心に向かって描き変えます。"
  143. point set 1 0 0
  144. background 0
  145. wait 120
  146. point set 1 160 120
  147. background 1
  148. wait 180
  149. button get end 1
  150. wipe 1 very fast vertical open
  151.  
  152. effect very slow vertical open
  153. cont string 0 "\neffect very slow vertical open\n \n中心から左右端に向かって描き変えます。"
  154. point set 1 0 0
  155. background 0
  156. wait 120
  157. point set 1 160 120
  158. background 1
  159. wait 180
  160. button get end 1
  161. wipe 1 very fast vertical close
  162.  
  163. effect very slow dissolve
  164. cont string 0 "\neffect very slow dissolve\n \n画面が染み出してくるように描き変えます。"
  165. point set 1 0 0
  166. background 0
  167. wait 120
  168. point set 1 160 120
  169. background 1
  170. wait 180
  171. button get end 1
  172. wipe 1 very fast dissolve
  173.  
  174. effect nomal line dissolve
  175. cont string 0 "\neffect nomal line dissolve (もしくは effect nomal blind)\n \nブラインドカーテンが切り替わるように描き変えます。"
  176. point set 1 0 0
  177. background 0
  178. wait 120
  179. point set 1 160 120
  180. background 1
  181. button get end 1
  182. wait 180
  183.  
  184. effect very fast shift down
  185. cont string 0 "\neffect very fast shift down\n \n描き換える領域を下に向かってスクロールさせていきます。"
  186. point set 1 0 0
  187. background 0
  188. wait 120
  189. point set 1 160 120
  190. background 1
  191. button get end 1
  192. wait 180
  193.  
  194. effect very fast shift up
  195. cont string 0 "\neffect very fast shift up\n \n描き換える領域を上に向かってスクロールさせていきます。"
  196. point set 1 0 0
  197. background 0
  198. wait 120
  199. point set 1 160 120
  200. background 1
  201. button get end 1
  202. wait 180
  203.  
  204. effect very fast shift right
  205. cont string 0 "\neffect very fast shift right\n \n描き換える領域を右に向かってスクロールさせていきます。"
  206. point set 1 0 0
  207. background 0
  208. wait 120
  209. point set 1 160 120
  210. background 1
  211. button get end 1
  212. wait 180
  213.  
  214. effect very fast shift left
  215. cont string 0 "\neffect very fast shift left\n \n描き換える領域を左に向かってスクロールさせていきます。"
  216. point set 1 0 0
  217. background 0
  218. wait 120
  219. point set 1 160 120
  220. background 1
  221. wait 180
  222. wipe 1 very slow wipe right
  223.  
  224. cont string 0 "\n\n\n\n以上で説明を終わります。マウスをクリックしてください。"
  225. button wait pause 0
  226. end
  227.